home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 102 / CD-ROM 102.iso / aplic / 2sync / 2SyncSetup.exe / modules / mt / panel / scripts / DefineButton2_409 / BUTTONCONDACTION on(release).as next >
Encoding:
Text File  |  2002-03-20  |  871 b   |  27 lines
  1. on(release){
  2.    if(getTimer() - myClickTime < eval("_level0/data:DCTime"))
  3.    {
  4.       path = "../../../../../../codelib:";
  5.       if(eval("../:type") eq "event")
  6.       {
  7.          set(path add "event_id",eval("../:id"));
  8.          set(path add "startyear",eval("../:startyear"));
  9.          set(path add "startmonth",eval("../:startmonth"));
  10.          set(path add "startday",eval("../:startday"));
  11.          call(path add "fix single digits");
  12.          call(path add "view event");
  13.       }
  14.       else
  15.       {
  16.          set(path add "task_id",eval("../:id"));
  17.          set(path add "RequestString","mt_ca_tc_" add eval("../:id"));
  18.          set("_level0/" add eval(path add "panel") add "_data:target",_target add "/" add path add "view taskcard");
  19.          call(path add "Request Data");
  20.       }
  21.    }
  22.    else
  23.    {
  24.       myClickTime = getTimer();
  25.    }
  26. }
  27.